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SSSSSS RRRRRRRR cc A vv 00 oO LL 
SSSSSS RRRRRRRR cc VV vv 00 0O LL 
SS RR RR cc VV vv 00 OO LL 
SS RR RR cc v¥ vv 00 oO LL 
SS RR RR cc VV sVV 00 oO LL eee 
SS RR RR cc VV VV 00 00 LL eoee 
SSSSSSSS RR RR cccccccc vv 000000 LLLLLLLLLL eee 
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1 ~3ep-19 4 OU: 38:2 ISKSVMSMASTER:CMOUNT .SRCISRCVOL.B32:1> (1) 
MODULE SRCVOL ( emeatk tei sorell 
DENT 2 ayant F 
= 


5 -¢ 004 : 
3 5 005 1 BEGIN : 
to ee hy | 
: 8 O28 : PITTIIILILI LLL LLL LLL LLL LLL LLL LLL LLL LLL LLL LLL LiL : 
5 'e & 3 
; 10 0010 1 !* COPYRIGHT (c) 1978, 1980, 1982, 1984 BY ’ 3 
; 11 0011 1 !* DIGITAL EQUIPMENT EORPORATION, MAYNARD, MASSACHUSETTS. * é 
; \¢ Bag : - ALL RIGHTS RESERVED. 7 : 
.- 0014 1 i® THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * ; 
. 0015 1 !* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * : 
3 16 0016 1 !* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * : 
H 17 0017 1 !* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * . 
4 18 0018 1 !* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * ° 
: 4 th ' = TRANSFERRED. ® : 
3 ' . 3 
$ 21 it 1 !® THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * ° 
; $$ 00 § 1 '* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * ; 
; $i o : is CORPORATION. : : 
: 25 0025 1 it DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * . 
$ 26 0026 1 !* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * 3 
2 oe : 
® * Ps 
: , 5 34 : WIITITITITITILILILI LLL LLL LLL LLL LLL LLL LLL LLL TLL, $ 
; (31 0031 1 !4¢ ; 
3 § it 4 1! $ 
; O08 1 ! FACILITY: MOUNT Utility Structure Level 1 3 
3 $e 034 1! 3 
3 5 0035 1 ! ABSTRACT: : 
; 4 0036 1! 3 
3 4 5 14 ' This routine searches the device database for a particular volume. : 
: § 0039 1 | ENVIRONMENT: : 
; 40 0040 1! : , 3 
;.6 CST 0041 1! STARLET operating system, including privileged system services : 
3 $g 94 1! and internal exec routines. 3 
; 6 0045 1! : 
: 44 Ohee 1 !e- : 
3 45 45 1! 3 
: 46 Bo0g 1f 3 
; rts sot { AUTHOR: Andrew C. Goldstein, CREATION DATE: 13-Oct-1977 20:09 : 
: 49 0049 1 | MODIFIED BY: : 
; $o it 4 1! 3 
,; FT 1 1! v03-008 HHO0SO Hai Huang 17-Aug-1984 3 
5 6 B26 1! Return success status if MOUNT/CLUSTER on a volume 3 
3 e7 7 : that is already mounted locally. : 
; 2 55 1! v03-007 HHO0041 Hai Huang som Jyh; 1906 : 
: 8 bpe$ ! : Remove REQUIRE 'LIBD$:CVASLIB.OBJJMOUNTMSG.B32'. ; 
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LIBRARY 
REQUIRE 


FORWARD 


“Sep :33:17 VAX-11 Bliss-32 V4.0-742 
~Sep- 71382 3: ‘3: y DISKSVMSMAS STER: [MOUNT . SRCISRCVOL. 832: 
v03-006 Wp056 Hai H 11-Jul-1984 


Allow MOUNT/CLUSTER = oiend that is Li pees mounted 
on the local node. 


V03-005 HHO0024 Hai Huang 18-Jun-1984 
Call I0CSCVT DEVNAM = format the device name on a 
successful shared mount. 


v03-004 ~ my 2 Hai Huang 01-Feb-1984 
ob-wide mount support, i.e. deallocate mount List 
-~ i es to paged-pool. 


v03-003 CDS0001 Christian D. Saether Se eenives 
Fix SEARCH_VOL so it knows how to run through 
all system blocks, and therefore find all ddb's. 


V03-002 DMW4041 DMWalp 7-Jun-1983 
Remove (S)LOG ENTRY 

v03-001 $TJ50311 Ste Jeffre 11-Feb-1983 

Make all uses of PHYS. *NARE” ledeuse’ by DEVICE_INDEX. 

v02-004 S$TJ0195 Steven Jeffreys, 02-Feb-1982 


Removed SYSEXV Pao pon “Ry 


v02-003 STJ0165 Steven T. Jeffreys, 04-Jan-1982 
Remove obsolete calls to SSETEXV. 


v02-002 ACG0169 Andrew C. Goldstein, 18-Apr-1980 13:58 
Bug check on internal errors 


v02-001 ACG0167 Andrew C. Goldstein, 18-Apr-1980 13:39 
Previous revision history moved to MOUNT.REV 


*SYSSLIBRARY: 


LIB. L32"; 
*SRC$:MOUDEF .B32'; 


ROUTINE 
SEARCH_VOL, 
SEARCH-HANDLER : NOVALUE; 


' search for mounted volume 
! condition handler for above 


3 
1) 
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H ioe 6 § 1 GLOBAL ROUTINE SEARCH_VOL (NAME) = 

; Ww 6 1 

; 104 1 +4 

; 105 BE 

3 198 6 § 1 ! FUNCTIONAL DESCRIPTION: 

; be 17 

; 108 638 1! This routine searches the device database for a particular volume. 
; 198 Re7P : } Only eiig structured devices mounted /SYSTEM, /GROUP, or /SHARE 
; are considered. 

3a 0641 1! 

; 1g Reng 1! 

, FF Bee 1 ! CALLING SEQUENCE: 

3; (114 644 1! SEARCH_VOL (ARG1) 

; #115 0645 1! 

; 116 Boas 1 ! INPUT PARAMETERS: 

; iit sat 4 : ARG1: string descriptor of volume Label 

3 6119 0649 1 ! IMPLICIT INPUTS: 

: 130 beet } MOUNT_OPTIONS: command option bits 

3 1$¢ Bo3¢ 1 ! OUTPUT PARAMETERS: 

we 0655 1! NONE 

s 126 0654 1! 

s te 0655 1 ! IMPLICIT OUTPU"S: 

: 126 0656 1! NONE 

: 127 0657 1! 

: 128 0658 1 ! ROUTINE VALUE: 

: 44 0659 1! UCB address of found volume or zero 

; 130 0660 1! 

s 331 0661 1 ! SIDE EFFECTS: 

: 136 pees } mount count of found volume is incremented if /SHARE mode mount 
s 134 0664 1 !-- 

s 135 0665 1 

; 136 0666 BEGIN 

s Yar 0667 

s 133 0668 MAP ‘ . 

: 1% 44 NAME : REF VECTOR; ! volume name string descriptor 
3 141 0671 LABEL 

3 136 st SEARCH_LOOP; ! outer device search loop 

: 61446 0674 LOCAL 

3: 6145 $673 STATUS, venees status value 

: 409 067 DDB : REF BBLOCK, | pointer to current DDB 

: 148 gers uCcB REF BBLOCK, ' pointer to current UCB 

: 13 eth vcB REF BBLOCK; ! pointer to current VCB 

s 131 0681 EXTERNAL 

; 136 be 5 MOUNT_OPTIONS : BITVECTOR, ! MOUNT command options 

: 15 8 DEVICE _INDEX : ! index into PHYS_NAME vector 

> 154 684 HYS_ : VECTOR, i physical device name descriptor 
3 6155 685 NAME BUFFER : VECTOR C BYTE), ! physical device name buffer 
i ie SibceMihy REE GEL: address oF SbtObe SSE SURE List ent 
: : -___! address of volume set moun y 
; «6158 0688 SCS$GQ_CONFIG : ADDRESSING_MODE (ABSOLUTE), 
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o 
BRASLSS 


R T = 
E (278,008.69); 
EXTERNAL ROUTINE 
! Lock 1/0 database mutex 
UNLOCK 1068, i unlock I/0 database mutex 
DEALLOCATE MEM, ' deallocate dynamic menory 
ALLOC_LOGNAME, ' ¢reate logical name and MTL entry 
ENTER LOGNAME, ! hook ye pop ical name and MIL entry 
IOCSCUT_DEVNSM : IOC_CVT_DEVNAM ADDRESSING_MODE (GENERAL), 
' get fu ly expanded device name 
MOUNT_CLUSTER; ! mount volume cluster-wide 


SLSSSSE 


! Enable our condition handler. 

! Needless to say, the search must be done with the I/0 database locked to 
: provers List perturbations. We run down the DDB List, following the UCB 
! List off each one, looking for file structured devices that are mounted 
but not allocated. 


> 
PAVILS SSIS ARAN SASSSGFAFERLISS 


ENABLE SEARCH_HANDLER; 
! For a shared mount. gree} tecate Logical name and mounted volume List entry 


oo 
“ 
ee ee ee 


WENO ODNAMNE WN (OOO NOAUN EW DO OONOUF wr 


for the worst case (RVN 1), since we cannot tolerate failures after bumping 
the mount count in a found VCB. If not needed, we discard them later. System 


! 
i 
and Group mounts don't need this, since we will fail here one way or the other. 


IF _ .MOUNT_OPTIONSCOPT_SHAREJ 
THEN 


A OGNAME (0); 
SMTL_ENTRY = .MTL_ENTRY; 
MTL_ENTRY = 0; 
ALLOC_LOGNAME (1); 

END; 


tk td tk a td ad nk 8 kd a 8 od “a a a tw a td I 


LOCK_1008 (); 

SB = .SCS$GQ_CONFIG; 

SEARCH LOOP: 

UNTIL .SB EQL SCS$GO_CONFIG 
BEGIN 

DdDB = .SB (SE$L_0DB); 

WHILE .DDB NEQ 0 

DO 
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' 1/0 database Listhea 
MOUNT_ITMLST LONS; ! address of the mount item List 
LINKAGE 
IOC_CVT_DEVNAM = JSB seecistee = 0, REGISTER = 1, REGISTER = 4, 
REG STER = 5: REGISTER = 1) : 
PRESERV ) 
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& 
4 
4 
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TATUS = 0; 
F .UCB NEQ 0 


pp 
x 


BEGIN 
IF .BBLOCKCUCBCUCBSL DEVCHARI, DEVSV_FOR] NEQ .MOUNT_OPTIONSCOPT_FOREIGN] 
THEN STATUS = MOUNS_INC 


ELSE 
BEGIN 


If NOT .MOUNT_OPTIONSCOPT_SHARE) 


THEN 
oS TATUS = MOUNS_VOLALRMNT 


STATUS = 1; 
vcBLVCB$u_ACOUNT) = .VCBCVCBSW_MCOUNT) + 1; 


p-1984 01:33:17 VAX-11 Bliss-32 v4.0-742 5 
- ats 7 re Be DISKSVMSMASTER: [MOUNT . SACISRCVOL.B32- 79 * 2) 
; § be thee 

$ 74 DDBCDDBSB_TYPE] NEQ DYNSC_D 

3 8 8 then BUG _CHECR ( art ae FATAL’ "Corrupted DDB List"); 

; a4 ucB = .DBBCDDB$L_UCB 

: 1 751 UNTIL .UCB EQL 0 DO 

3 § 7 § 6 BEGIN 

3 7 ? IF .UCBCUCBSB_TYPE] NEQ DYNSC_U 

; 2 r : ° THEN BUG_CHECR (NOTUCBUCB, FATALE ‘Corrupted UCB List"); 

3 : 7 § 6 IF .BBLOCKCUCBCUCBSL ata be pevev -f00 

3 7 ? AND .BBLOCKCUCB iar rest DENCHA oe 

3 8 7 3 ae NOT .BBLOCK ve EvaV WALL 

3 9 644 6 we. NOT .BBLOCK ute Mitte ~DEVCHARD, ; DEVSV~ OMT 

; 1 761 § BEGIN 

r ; 762 7 vcB = scot yeaa vos 

: 763 7 IF .VvCB TYPE) WEQ DYNSC_VCB 

3 764 7 THEN BUG G CHEER nan (01 uce FATAL’ "Not VCB pointer in UCB"); 
FH 5 765 7 IF CHSEGE ( C1 

: 766 ? 5 VOLNARE. VCBLVCBST_VOLNAME], ' ') 

; 767 7 THEN LEAVE SEARCH LOOP; 

; 0768 6 END; 

3 0769 ucB = .UCBCUCBSL_LINKJ; 

3 770 END; ' end of UCB scan loop 

: 771 DDB = .ODBCDDBSL_LINK); 

3 a ? END; ! end of DDB scan loop 

: ae 4 Ain -SB CSBSL_FLINK); 

3 6 END: ! end of block SEARCH_LOOP 

3 7 ' If we find a qutceete volume that matches the name, the search is over. 
3 7 i If the mount is /SHA RE, we increment the volume mount count here and now 
; i to avoid race conditions. Finding a volume on a /SYSTEM or /GROUP mount 
3 1 is an error. 

3 4 

s 4 

3 4 

2 4 

s 4 

7 ; 

: 4 

: 4 
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‘ For a successful shared mount or volume already gountye, format the 
expanded device name and set up the device name descriptor. 


{OCSCVT_DEVNAM (NAMEBUF _LEN, 
NAME BUFFER + 
(. BEVICE_INDEX*NAMEBUF _LEN), 


Output buffer Length 


SRISARA 


Output buffer address 

Format device name in display form 
Address of the target UCB 

Returned Length 


—— me 


B; 
PHYS NAME C.DEVICE_INDEX*2)); 
PHYS _NAMEL(.DEVICE_IRNDEX*®2)+1] = NAME BUFFER + 
mae T.DEVICE_INDEX*NAMEBUF _LEN) ; 
END; 


UNLOCK_10D8 (); 


Set up device name descriptor 


2 
SSBLEALANES Sao AR 
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i If the /CLUSTER option is specified, send the request cluster-wide even 
' if the volume is already mounted on the local node. Return with success 
' in this case. 
if ( STATUS EQL MOUNS_VOLALRMNT) 
D ( .MOUNT_OPTIONS COPT_CLUSTER]) 
BEGIN 
MOUNT CLUSTER (.MOUNT_ITMLST); 
RETURN 1; 
END; 
IF NOT .STATUS THEN ERR_EXIT (.STATUS); 
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We now have a successful shared mount. Fill in the logical name and MTL 
entries. 


' If what we found is RVN 1 of a volume set, keep the entries as is. Otherwise 


i 
i 
i 
i 
release one of each. 


IF .BBLOCK Nats ee DEVCHAR], DEV$¥_SQD) 
ron VCBSW_RVN) NEO 1 


BEGIN 
DEALLOCATE_MEM (.MTL_ENTRY, 1); 


MTL_ENTRY = + BATL ENTRY 
Snic ENTRY = 0; 


ENTER_LOGNAME (.UCB, .VCB); 
RETURN 1; 
END; ! end of routine SEARCH_VOL 
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OFFC 00000 
0000G CF 9E 0000 
00006 cr 9E 000 
000000006 9F 9E 900 
80906 CF 9E 0001 
01 CF DE 0001 
06 €1 00010 
7E 04 00021 
01 FB 000 ; 
68 00 000 
68 04 00028 
01 DD 00020 
01 FB 338 F 
00 FB 990 
69 00 tH 
57 Di 0003C 
60 13 0003F 
54 A? 0 0041 
55 13 00045 
OA AS 91 00047 
04 13 00048 
FEFF Q004D 
0000* 9004F 
046 AG 0 00051 
7 1 watt) 
OA AS 91 O82 
04 13 00058 
FEFF 00050 
gous Ot 
gr ie 
SA COA 5 00068 
a 19 $ 
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FEFF it 
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1986 92:45:55 


Bl iss32 v4.0-7 


MOUNT_OPTIONS, DEVICE_INDEX 
PHYS ° BUFFER 

MTL_ENTRY, SMTL_ENTRY 
SCS$GQ_CONFIG, ROUNT .ITALST 


SCODES,,NOWRT ,2 


Soe hy VOL, Save R2,R3,R4,R5,R6,R7,R8B,RI,- 


SMTL_ENTRY, R11 
MOUNT OPTIONS, R10 
a#SCS$GQ_CONFIG, R9 
a ENTRY, R8 

#6, MOUNT OPTIONS, 1$ 
#1, ALLOC_LOGNAME 
MTL_ENTRY, SMTL_ENTRY 
MIL NTRY 

#1, ALLOC LOGNAME 

#0. LOCK TODB 
$C$$60_CONFIG, SB 


1 
84(SB), DDB 


4(DDBY, U 


<BUGS_NOTVCBUCB! 4> 
(RO), @4(RO), #32, #12, 20(VCB) 
11$ 


VAX-11 -742 Page 7 
DISKSVMSMASTER:CMOUNT.SRCIJSRCVOL.B32;1 (2) 


0632. 


ooo 9Co0O COCO COO 
ANN ONNNONNN ONNO 
Pr WWWA NKTN NNO 
NEM OFM COON CWO 


F 16 
SRC 16-Sep-1984 2:33:17 VAX-11 Bliss-32 V4.0-742 
904-050 e=peen aee ee T neha tens chounr cacIsrcvoL.e3204°" 


91 8$: MOVL $3 (uCce), uCcB 
33 98: BRB 5 


55 30 AS 06 
54 é 00 9 MOVL DDB), DDB 

57 e D0 0009C 10$: MOVL (SB), SB 
11 0009F BRB $ 
D4 OOOA1 11$:  CLRL STATUS 
D3 A TSTL B 
1 A BEQL 3 
50 91 AA 01 6 EF OOOA EXTZ2V #3, a, MOUNT OPTIONS+1, RO 
50 AS 1 F A CMPZ7V # , 59(UCB), 
0 908 BEQL Ss hes 
52 007280AC  8F D B MOVL #7504044, STATUS 
46 11 ooB¢ BRB 1 
09 6A 06 EO OOOBE 12$: BBS i: MOUNT_OPTIONS, 13$ 
2 00728084 8F 00 000C MOVL #7504052, STATUS 
06 11 000¢ BRB 
52 01 DO 000CB 13$: ##MOVL #1, STATUS 
4C Ag 86 OOCE INCW q (vee) 
50 00006 CF 0 0001 14$: SSHL DEVICE_INDEX, RO 
51 0000GCF40 9E 00007 MOVAB NAME BUFFERLROJ, R1 
34 1 cE 000D MNEGL #1, R4 
0 0 D O0E0 MOVL #32, RO 
000000006 60 16 OO0E $B 1OC$CVT_DEVNAM 
50 0G CF oN 78 000E9 ASHL #1, DEVICE_INDEX, RO 
0000GCF 40 1 00 OOOEF VL —R1. PHYS eNAMECROS 
51 0G CF 05 OO0F > ASHL = #5, DEVITE IN oi 
0000GCF40 OO00GCF41 9E O00FB MOVAB NAME B FFER Ri pays _NAME+4CROJ 
G CF 00 FB 00104 15$: CALLS #0, ONLO K 1008 
00728084 &F 38 D1 00109 CMPL _—s STATUS, Ons 4052 
10 12 0011 BNEQ 1 
0B 07 ~AA 06 £1 oo14 BBC #6, MOUNT _OPTIONS+7, 16$ 
00006 CF DD 0011 PUSHL MOUNT ITMCST 
0000G CF 1 FB 0011B CALLS MOUNT_CLUSTER 
D 11 00120 BRB 508 
09 g E8 001 : 16$ BLBS = STATUS, 17$ 
52 DD 001 PUSHL STATUS 
000000006 00 01 FB 91 ? CALLS #1, LIBSSTOP 
6 36 AS 05 €0 OO12E 17$: BBS #9 (u ), 18% 
01 0& Ad Bi 001 CMPW 4ivee 
O0€ 13 001 BEQL 
01 DD 00139 18$ PUSHL 
68 bd 00138 PUSHL 
00006 CF 02 FB 91 CALLS Bo “DEALLOCA TE_MEM 
68 68 DO 0014 MOVL sAfl , MIC_ENTRY 
68 D4 14 CLRL snr ENTRY 
7E D 00147 19$:  MOVvO ue. OnE) 
00006 cr 02 FB 14A CALLS » ENTER_LOGNAME 
0 1 B0 14 208: HOVL a. RO 
155 218 «WORD Save nothing 
1 CLRL 30s = (SP) 
1 PUSHL SP 
159 MOVQ. 4 (AP), =(SP) 
1 p CALLS #3, SEARCH HANDLER 
1 RET 
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; Routine Size: 


355 bytes, 


Routine Base: 
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DISK KSVM 
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ROUTINE SEARCH_HANDLER (SIGNAL, MECHANISM) : NOVALUE = 


lee 


i FUNCTIONAL DESCRIPTION: 


This routine is the condition handler for the volume search 
routine. It undoes any Conepe done so far and returns the error 
status to the user mode caller. 


i CALLING SEQUENCE: 


KERNEL_HANDLER (ARG1, ARG2) 


! 

! 

! 

' 

! 

1 

4 

' 

' 

' 

! INPUT PARAMETERS: 

! ARG1: address of signal vector 

ARG2: address of mechanism vector 

i IMPLICIT INPUTS: 

global pointers to blocks allocated 

i QUTPUT PARAMETERS: 

NONE 

i IMPLICIT OUTPUTS: 

NONE 

i ROUTINE VALUE: 

NONE 

i SIDE EFFECTS: 

stack unwound, allocations undone 

lee 

BEGIN 
SIGNAL : REF BBLOCK, ' signal vector 
MECHANISM : REF BBLOCK; ! mechanism vector 

EXTERNAL 
MOUNT OPTIONS : BITVECTOR, ' command parser options 
MTL_ERTRY : REF BBLOCK, ! address of mount List entry ‘ 
SMTC_ENTRY : REF BBLOCK; ! address of volume set mount List entry 


EXTERNAL ROUTINE 


unlock 1/0 database mutex 
deallocate system dynamic memory 


UNLOCK 10DB, 
DEALLOCATE_MEM; 


{0 ,SEGHALCCHF SL S16_MARED NEQ SS$_UNWIND 


BEGIN 


IF .SIGNALCCHFS$L_SIG_ARGS] NEQ 3 
THEN BUG_CHECK (ONXSTGNAL, FATAL, ‘Unexpected signal in MOUNT"); 


V4.0-742 
T.SRCISRCVOL .B32 


s2 


IF .MTL_ENTRY NEQ 0 
THEN DEALLOCATE_MEM (.MTL_ENTRY, 1); 


} Deallocate whatever control blocks exist to wherever they came from. 


IF .SMTL_ ENTRY NEQ 0 
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Routine Base: 


; Routine Size: 


THEN DEACLOCATE_MEM (.SMTL_ENTRY, 1); 
MTL_ENTRY = SMTL_ENTRY = 0; 
} Return the condition code in RO. 


MECHANISMCCHFSL_MCH_SAVRO] = .SIGNALCCHFSL_SIG_NAME]; 
SUNWIND (); 
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04 
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00006 


V4.0-742 Pag 
CMOUNT.SRCISRCVOL .B32; 1 


! end of routine KERNEL_HANDLER 


.EXTRN BUGS_UNXSIGNAL, SYSSUNWIND 
0000 00000 SEARCH_HANDLER: 
WORD 


ons 
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UG$_UNXSIGNAL ! 4> 
BIL LERTRY. RO 


par Seer er eres 
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#2, DEALLOCATE_MEM 
SMTL_ENTRY 
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SIGRAL, RO 
4(RO), 12(R1) 
=(SP) 

#2, SYSSUNWIND 
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SCODES + 0163 


16 
1a-se =1984 01:33:17 VAX-11 Bliss-32 V4.0-742 
12-88-1980 Ou: 38:4 DISKSVMSMASTER: CMOUNT SRCISRCVOL. B32, ha 


4 5 1 END 
408 8382 0 ELUDOM 
-EXTRN LIBSSTOP 
PSECT SUMMARY 

Name Bytes Attributes 

SCODES 439 WNOVEC,NOWRT, RD, EXE,NOSHR, LCL, REL, CON,NOPIC,ALIGN(2) 
Library Statistics 
soceee-= Symbols ------ -- Pages Processing 

File Total Loaded Percent Mapped Time 

-$255$DUA28: CSYSLIBILIB.L32;1 18619 39 0 1000 00:01.9 


COMMAND QUALIFIERS 
BLISS/CHECK=(FIELD, INITIAL ,OPTIMIZE)/LIS=LIS$:SRCVOL/OBJ=OBJ$:SRCVOL MSRC$:SRCVOL/UPDATE=(ENH$:SRCVOL) 
Size: 439 e + 0 data bytes 
; 716.4 y 


Lexemes/CPU-Min: 2 
Memor ry Ut Used: 157 pages 
Compilation Complete 


1¢ | 
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